home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / dired / dired-lisp.elc < prev    next >
Emacs Compiled Lisp  |  1995-08-29  |  3.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Emacs Compiled Lisp (other/emacsCompiledLisp) magic Unsupported
1% dexvert Combustion 2 Particle Library (other/combustion2ParticleLibrary) ext Unsupported
100% file Emacs/XEmacs v19 byte-compiled Lisp data default
99% file data default
100% TrID Emacs/XEmacs byte-compiled Lisp (generic) default
100% xdgMime text/x-emacs-lisp default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 33 3a 35 35 3a 33 | 37 20 31 39 39 35 0a 3b | 13:55:3|7 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 64 69 | 72 65 64 2f 64 69 72 65 |/lisp/di|red/dire|
|00000090| 64 2d 6c 69 73 70 2e 65 | 6c 0a 3b 3b 3b 20 65 6d |d-lisp.e|l.;;; em|
|000000a0| 61 63 73 20 76 65 72 73 | 69 6f 6e 20 31 39 2e 31 |acs vers|ion 19.1|
|000000b0| 33 20 58 45 6d 61 63 73 | 20 4c 75 63 69 64 2e 0a |3 XEmacs| Lucid..|
|000000c0| 3b 3b 3b 20 62 79 74 65 | 63 6f 6d 70 20 76 65 72 |;;; byte|comp ver|
|000000d0| 73 69 6f 6e 20 32 2e 32 | 35 3b 20 31 2d 53 65 70 |sion 2.2|5; 1-Sep|
|000000e0| 2d 39 34 2e 0a 3b 3b 3b | 20 6f 70 74 69 6d 69 7a |-94..;;;| optimiz|
|000000f0| 61 74 69 6f 6e 20 69 73 | 20 6f 6e 2e 0a 3b 3b 3b |ation is| on..;;;|
|00000100| 20 74 68 69 73 20 66 69 | 6c 65 20 75 73 65 73 20 | this fi|le uses |
|00000110| 6f 70 63 6f 64 65 73 20 | 77 68 69 63 68 20 64 6f |opcodes |which do|
|00000120| 20 6e 6f 74 20 65 78 69 | 73 74 20 69 6e 20 45 6d | not exi|st in Em|
|00000130| 61 63 73 20 31 38 2e 0a | 0a 28 69 66 20 28 61 6e |acs 18..|.(if (an|
|00000140| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 6d 61 63 73 |d (bound|p 'emacs|
|00000150| 2d 76 65 72 73 69 6f 6e | 29 0a 09 20 28 6f 72 20 |-version|).. (or |
|00000160| 28 61 6e 64 20 28 62 6f | 75 6e 64 70 20 27 65 70 |(and (bo|undp 'ep|
|00000170| 6f 63 68 3a 3a 76 65 72 | 73 69 6f 6e 29 20 65 70 |och::ver|sion) ep|
|00000180| 6f 63 68 3a 3a 76 65 72 | 73 69 6f 6e 29 0a 09 20 |och::ver|sion).. |
|00000190| 20 20 20 20 28 73 74 72 | 69 6e 67 2d 6c 65 73 73 | (str|ing-less|
|000001a0| 70 20 65 6d 61 63 73 2d | 76 65 72 73 69 6f 6e 20 |p emacs-|version |
|000001b0| 22 31 39 22 29 29 29 0a | 20 20 20 20 28 65 72 72 |"19"))).| (err|
|000001c0| 6f 72 20 22 54 68 69 73 | 20 66 69 6c 65 20 77 61 |or "This| file wa|
|000001d0| 73 20 63 6f 6d 70 69 6c | 65 64 20 66 6f 72 20 45 |s compil|ed for E|
|000001e0| 6d 61 63 73 20 31 39 2e | 22 29 29 0a 0a 28 64 65 |macs 19.|"))..(de|
|000001f0| 66 63 6f 6e 73 74 20 64 | 69 72 65 64 2d 6c 69 73 |fconst d|ired-lis|
|00000200| 70 2d 76 65 72 73 69 6f | 6e 20 28 73 75 62 73 74 |p-versio|n (subst|
|00000210| 72 69 6e 67 20 22 21 52 | 65 76 69 73 69 6f 6e 3a |ring "!R|evision:|
|00000220| 20 31 2e 38 20 21 22 20 | 31 31 20 2d 32 29 20 22 | 1.8 !" |11 -2) "|
|00000230| 5c 0a 21 49 64 3a 20 64 | 69 72 65 64 2d 6c 69 73 |\.!Id: d|ired-lis|
|00000240| 70 2e 65 6c 2c 76 20 31 | 2e 38 20 31 39 39 32 2f |p.el,v 1|.8 1992/|
|00000250| 30 35 2f 30 31 20 31 37 | 3a 35 30 3a 35 36 20 73 |05/01 17|:50:56 s|
|00000260| 6b 20 45 78 70 20 21 22 | 29 0a 28 62 79 74 65 2d |k Exp !"|).(byte-|
|00000270| 63 6f 64 65 20 22 c0 c1 | 21 88 c2 c3 21 ac 85 c3 |code "..|!...!...|
|00000280| c4 4b 4d 88 c4 c5 4d 87 | 22 20 5b 72 65 71 75 69 |.KM...M.|" [requi|
|00000290| 72 65 20 64 69 72 65 64 | 20 66 62 6f 75 6e 64 70 |re dired| fboundp|
|000002a0| 20 64 69 72 65 64 2d 6c | 69 73 70 2d 75 6e 69 78 | dired-l|isp-unix|
|000002b0| 2d 6c 73 20 64 69 72 65 | 64 2d 6c 73 20 64 69 72 |-ls dire|d-ls dir|
|000002c0| 65 64 2d 6c 69 73 70 2d | 6c 73 5d 20 32 29 0a 28 |ed-lisp-|ls] 2).(|
|000002d0| 66 73 65 74 20 27 64 69 | 72 65 64 2d 6c 69 73 70 |fset 'di|red-lisp|
|000002e0| 2d 6c 73 20 23 5b 28 66 | 69 6c 65 20 26 6f 70 74 |-ls #[(f|ile &opt|
|000002f0| 69 6f 6e 61 6c 20 73 77 | 69 74 63 68 65 73 20 77 |ional sw|itches w|
|00000300| 69 6c 64 63 61 72 64 20 | 66 75 6c 6c 2d 64 69 72 |ildcard |full-dir|
|00000310| 65 63 74 6f 72 79 2d 70 | 29 20 22 08 ac 82 09 10 |ectory-p|) ".....|
|00000320| 08 3a ac 85 c2 c3 08 5c | 22 10 0c ab 8b c5 0e 06 |.:.....\|".......|
|00000330| 21 14 c7 0e 06 21 16 06 | 0c ac 85 0e 08 83 ba 00 |!....!..|........|
|00000340| c9 0e 06 21 89 1e 5c 6e | 1e 0b cc 1e 0d ce 1e 0f |...!..\n|........|
|00000350| d0 0e 5c 6e ce 0c 23 1e | 11 ce 1e 12 ce 1e 13 ce |..\n..#.|........|
|00000360| 1e 14 d5 08 3e ab 89 d6 | d7 0e 11 5c 22 16 11 aa |....>...|...\"...|
|00000370| 8c d8 08 3e ac 87 d6 d9 | 0e 11 5c 22 16 11 c2 da |...>....|..\"....|
|00000380| 0e 11 5c 22 16 12 db 63 | 88 dc 0e 12 08 5c 22 16 |..\"...c|.....\".|
|00000390| 12 0e 12 ab ae 0e 12 40 | 89 16 0f 40 16 1d 0e 0f |.......@|...@....|
|000003a0| 41 16 14 0e 12 41 16 12 | 0e 5c 6e 0e 1d 50 16 13 |A....A..|.\n..P..|
|000003b0| 0e 0d de 0e 14 38 5c 5c | 16 0d df 0e 1d 0e 14 08 |.....8\\|........|
|000003c0| 23 63 88 aa 4e 8a e0 e1 | 21 88 cc 95 62 88 e2 e3 |#c..N...|!...b...|
|000003d0| 21 88 e4 e5 0e 0d e6 a5 | 54 5c 22 63 2e 09 87 c5 |!.......|T\"c....|
|000003e0| 0e 06 21 16 06 df 0e 06 | e7 0e 06 21 08 23 63 87 |..!.....|...!.#c.|
|000003f0| 22 20 5b 73 77 69 74 63 | 68 65 73 20 64 69 72 65 |" [switc|hes dire|
|00000400| 64 2d 6c 69 73 74 69 6e | 67 2d 73 77 69 74 63 68 |d-listin|g-switch|
|00000410| 65 73 20 6d 61 70 63 61 | 72 20 69 64 65 6e 74 69 |es mapca|r identi|
|00000420| 74 79 20 77 69 6c 64 63 | 61 72 64 20 66 69 6c 65 |ty wildc|ard file|
|00000430| 2d 6e 61 6d 65 2d 6e 6f | 6e 64 69 72 65 63 74 6f |-name-no|ndirecto|
|00000440| 72 79 20 66 69 6c 65 20 | 66 69 6c 65 2d 6e 61 6d |ry file |file-nam|
|00000450| 65 2d 64 69 72 65 63 74 | 6f 72 79 20 66 75 6c 6c |e-direct|ory full|
|00000460| 2d 64 69 72 65 63 74 6f | 72 79 2d 70 20 66 69 6c |-directo|ry-p fil|
|00000470| 65 2d 6e 61 6d 65 2d 61 | 73 2d 64 69 72 65 63 74 |e-name-a|s-direct|
|00000480| 6f 72 79 20 64 69 72 20 | 64 65 66 61 75 6c 74 2d |ory dir |default-|
|00000490| 64 69 72 65 63 74 6f 72 | 79 20 30 20 73 75 6d 20 |director|y 0 sum |
|000004a0| 6e 69 6c 20 65 6c 74 20 | 64 69 72 65 63 74 6f 72 |nil elt |director|
|000004b0| 79 2d 66 69 6c 65 73 20 | 66 69 6c 65 2d 6c 69 73 |y-files |file-lis|
|000004c0| 74 20 66 69 6c 65 2d 61 | 6c 69 73 74 20 66 69 6c |t file-a|list fil|
|000004d0| 20 61 74 74 72 20 36 35 | 20 64 69 72 65 64 2d 6c | attr 65| dired-l|
|000004e0| 69 73 70 2d 64 65 6c 65 | 74 65 2d 6d 61 74 63 68 |isp-dele|te-match|
|000004f0| 69 6e 67 20 22 5e 5c 5c | 2e 5c 5c 2e 3f 24 22 20 |ing "^\\|.\\.?$" |
|00000500| 39 37 20 22 5e 5c 5c 2e | 22 20 23 5b 28 78 29 20 |97 "^\\.|" #[(x) |
|00000510| 22 08 c1 c2 08 21 21 42 | 87 22 20 5b 78 20 66 69 |"....!!B|." [x fi|
|00000520| 6c 65 2d 61 74 74 72 69 | 62 75 74 65 73 20 65 78 |le-attri|butes ex|
|00000530| 70 61 6e 64 2d 66 69 6c | 65 2d 6e 61 6d 65 5d 20 |pand-fil|e-name] |
|00000540| 34 5d 20 22 74 6f 74 61 | 6c 20 07 5c 6e 22 20 64 |4] "tota|l .\n" d|
|00000550| 69 72 65 64 2d 6c 69 73 | 70 2d 68 61 6e 64 6c 65 |ired-lis|p-handle|
|00000560| 2d 73 77 69 74 63 68 65 | 73 20 73 68 6f 72 74 20 |-switche|s short |
|00000570| 37 20 64 69 72 65 64 2d | 6c 69 73 70 2d 66 6f 72 |7 dired-|lisp-for|
|00000580| 6d 61 74 20 73 65 61 72 | 63 68 2d 62 61 63 6b 77 |mat sear|ch-backw|
|00000590| 61 72 64 20 22 74 6f 74 | 61 6c 20 07 22 20 64 65 |ard "tot|al ." de|
|000005a0| 6c 65 74 65 2d 63 68 61 | 72 20 2d 31 20 66 6f 72 |lete-cha|r -1 for|
|000005b0| 6d 61 74 20 22 25 64 22 | 20 31 30 32 34 20 66 69 |mat "%d"| 1024 fi|
|000005c0| 6c 65 2d 61 74 74 72 69 | 62 75 74 65 73 5d 20 35 |le-attri|butes] 5|
|000005d0| 20 22 5c 0a 64 69 72 65 | 64 2d 6c 69 73 70 2e 65 | "\.dire|d-lisp.e|
|000005e0| 6c 27 73 20 76 65 72 73 | 69 6f 6e 20 6f 66 20 64 |l's vers|ion of d|
|000005f0| 69 72 65 64 2d 6c 73 2e | 0a 4b 6e 6f 77 6e 20 73 |ired-ls.|.Known s|
|00000600| 77 69 74 63 68 65 73 3a | 20 41 20 61 20 53 20 72 |witches:| A a S r|
|00000610| 20 69 20 73 20 74 0a 49 | 6e 20 45 6d 61 63 73 20 | i s t.I|n Emacs |
|00000620| 31 39 2c 20 61 64 64 69 | 74 69 6f 6e 61 6c 20 6b |19, addi|tional k|
|00000630| 6e 6f 77 6e 20 73 77 69 | 74 63 68 65 73 20 61 72 |nown swi|tches ar|
|00000640| 65 3a 20 63 20 75 0a 4f | 74 68 65 72 73 20 61 72 |e: c u.O|thers ar|
|00000650| 65 20 69 67 6e 6f 72 65 | 64 2e 0a 0a 20 20 49 6e |e ignore|d... In|
|00000660| 73 65 72 74 20 6c 73 20 | 6f 75 74 70 75 74 20 6f |sert ls |output o|
|00000670| 66 20 46 49 4c 45 2c 20 | 6f 70 74 69 6f 6e 61 6c |f FILE, |optional|
|00000680| 6c 79 20 66 6f 72 6d 61 | 74 74 65 64 20 77 69 74 |ly forma|tted wit|
|00000690| 68 20 53 57 49 54 43 48 | 45 53 2e 0a 4f 70 74 69 |h SWITCH|ES..Opti|
|000006a0| 6f 6e 61 6c 20 74 68 69 | 72 64 20 61 72 67 20 57 |onal thi|rd arg W|
|000006b0| 49 4c 44 43 41 52 44 20 | 6d 65 61 6e 73 20 74 72 |ILDCARD |means tr|
|000006c0| 65 61 74 20 6e 6f 6e 2d | 64 69 72 65 63 74 6f 72 |eat non-|director|
|000006d0| 79 20 70 61 72 74 20 6f | 66 20 46 49 4c 45 20 61 |y part o|f FILE a|
|000006e0| 73 0a 65 6d 61 63 73 20 | 72 65 67 65 78 70 20 28 |s.emacs |regexp (|
|000006f0| 5f 6e 6f 74 5f 20 61 20 | 73 68 65 6c 6c 20 77 69 |_not_ a |shell wi|
|00000700| 6c 64 63 61 72 64 29 2e | 20 20 49 66 20 79 6f 75 |ldcard).| If you|
|00000710| 20 65 6e 74 65 72 20 72 | 65 67 65 78 70 73 20 72 | enter r|egexps r|
|00000720| 65 6d 65 6d 62 65 72 0a | 74 6f 20 64 6f 75 62 6c |emember.|to doubl|
|00000730| 65 20 65 61 63 68 20 24 | 20 73 69 67 6e 2e 0a 0a |e each $| sign...|
|00000740| 4f 70 74 69 6f 6e 61 6c | 20 66 6f 75 72 74 68 20 |Optional| fourth |
|00000750| 61 72 67 20 46 55 4c 4c | 2d 44 49 52 45 43 54 4f |arg FULL|-DIRECTO|
|00000760| 52 59 2d 50 20 6d 65 61 | 6e 73 20 66 69 6c 65 20 |RY-P mea|ns file |
|00000770| 69 73 20 61 20 64 69 72 | 65 63 74 6f 72 79 20 61 |is a dir|ectory a|
|00000780| 6e 64 0a 73 77 69 74 63 | 68 65 73 20 64 6f 20 6e |nd.switc|hes do n|
|00000790| 6f 74 20 63 6f 6e 74 61 | 69 6e 20 60 64 27 2e 0a |ot conta|in `d'..|
|000007a0| 0a 53 57 49 54 43 48 45 | 53 20 64 65 66 61 75 6c |.SWITCHE|S defaul|
|000007b0| 74 20 74 6f 20 64 69 72 | 65 64 2d 6c 69 73 74 69 |t to dir|ed-listi|
|000007c0| 6e 67 2d 73 77 69 74 63 | 68 65 73 2e 22 5d 29 0a |ng-switc|hes."]).|
|000007d0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 4d 88 |(byte-co|de "..M.|
|000007e0| c2 c3 4d 88 c4 c5 4d 88 | c6 c7 4d 88 c8 c9 4d 88 |..M...M.|..M...M.|
|000007f0| ca cb 4d 88 cc cd 21 87 | 22 20 5b 64 69 72 65 64 |..M...!.|" [dired|
|00000800| 2d 6c 69 73 70 2d 64 65 | 6c 65 74 65 2d 6d 61 74 |-lisp-de|lete-mat|
|00000810| 63 68 69 6e 67 20 23 5b | 28 72 65 67 65 78 70 20 |ching #[|(regexp |
|00000820| 6c 69 73 74 29 20 22 c0 | 19 5c 6e ab 92 c3 0c 5c |list) ".|.\n....\|
|00000830| 6e 40 5c 22 ac 85 5c 6e | 40 09 42 11 5c 6e 41 89 |n@\"..\n|@.B.\nA.|
|00000840| 12 ac 6e 09 29 87 22 20 | 5b 6e 69 6c 20 72 65 73 |..n.)." |[nil res|
|00000850| 75 6c 74 20 6c 69 73 74 | 20 73 74 72 69 6e 67 2d |ult list| string-|
|00000860| 6d 61 74 63 68 20 72 65 | 67 65 78 70 5d 20 34 5d |match re|gexp] 4]|
|00000870| 20 64 69 72 65 64 2d 6c | 69 73 70 2d 68 61 6e 64 | dired-l|isp-hand|
|00000880| 6c 65 2d 73 77 69 74 63 | 68 65 73 20 23 5b 28 66 |le-switc|hes #[(f|
|00000890| 69 6c 65 2d 61 6c 69 73 | 74 20 73 77 69 74 63 68 |ile-alis|t switch|
|000008a0| 65 73 29 20 22 c0 19 c2 | 0b c4 0d 3e ab 83 c6 aa |es) "...|...>....|
|000008b0| 8d c7 0d 3e ab 87 c8 0d | 21 11 c9 aa 81 ca 5c 22 |...>....|!.....\"|
|000008c0| 13 29 cb 0d 3e ab 83 0b | 9f 13 0b 87 22 20 5b 6e |.)..>...|...." [n|
|000008d0| 69 6c 20 69 6e 64 65 78 | 20 73 6f 72 74 20 66 69 |il index| sort fi|
|000008e0| 6c 65 2d 61 6c 69 73 74 | 20 38 33 20 73 77 69 74 |le-alist| 83 swit|
|000008f0| 63 68 65 73 20 23 5b 28 | 78 20 79 29 20 22 c0 09 |ches #[(|x y) "..|
|00000900| 41 38 c0 5c 6e 41 38 57 | 87 22 20 5b 37 20 79 20 |A8.\nA8W|." [7 y |
|00000910| 78 5d 20 33 5d 20 31 31 | 36 20 64 69 72 65 64 2d |x] 3] 11|6 dired-|
|00000920| 6c 69 73 70 2d 74 69 6d | 65 2d 69 6e 64 65 78 20 |lisp-tim|e-index |
|00000930| 23 5b 28 78 20 79 29 20 | 22 c0 09 5c 6e 41 38 09 |#[(x y) |"..\nA8.|
|00000940| 0b 41 38 5c 22 87 22 20 | 5b 74 69 6d 65 2d 6c 65 |.A8\"." |[time-le|
|00000950| 73 73 70 20 69 6e 64 65 | 78 20 79 20 78 5d 20 34 |ssp inde|x y x] 4|
|00000960| 5d 20 23 5b 28 78 20 79 | 29 20 22 08 40 09 40 99 |] #[(x y|) ".@.@.|
|00000970| 87 22 20 5b 78 20 79 5d | 20 32 5d 20 31 31 34 5d |." [x y]| 2] 114]|
|00000980| 20 34 5d 20 74 69 6d 65 | 2d 6c 65 73 73 70 20 23 | 4] time|-lessp #|
|00000990| 5b 28 74 69 6d 65 30 20 | 74 69 6d 65 31 29 20 22 |[(time0 |time1) "|
|000009a0| 08 40 09 40 08 41 40 09 | 41 40 1a 1b 1c 89 1d 0c |.@.@.A@.|A@......|
|000009b0| 57 ae 88 0d 0c 55 ad 83 | 0b 5c 6e 57 2c 87 22 20 |W....U..|.\nW,." |
|000009c0| 5b 74 69 6d 65 30 20 74 | 69 6d 65 31 20 6c 6f 31 |[time0 t|ime1 lo1|
|000009d0| 20 6c 6f 30 20 68 69 31 | 20 68 69 30 5d 20 35 5d | lo0 hi1| hi0] 5]|
|000009e0| 20 64 69 72 65 64 2d 6c | 69 73 70 2d 66 6f 72 6d | dired-l|isp-form|
|000009f0| 61 74 20 23 5b 28 66 69 | 6c 65 2d 6e 61 6d 65 20 |at #[(fi|le-name |
|00000a00| 66 69 6c 65 2d 61 74 74 | 72 20 26 6f 70 74 69 6f |file-att|r &optio|
|00000a10| 6e 61 6c 20 73 77 69 74 | 63 68 65 73 29 20 22 08 |nal swit|ches) ".|
|00000a20| 40 19 c2 0b 3e ad 86 c4 | c5 c6 08 38 5c 22 c7 0b |@...>...|...8\"..|
|00000a30| 3e ad 89 c4 c8 c9 08 38 | ca a5 54 5c 22 cb 08 38 |>......8|..T\"..8|
|00000a40| c4 cc 08 41 40 cd 08 38 | ce 08 38 c9 08 38 25 cf |...A@..8|..8..8%.|
|00000a50| 08 0b 5c 22 d0 0e 11 09 | 3b ab 85 d2 09 50 aa 81 |..\"....|;....P..|
|00000a60| d3 d4 b0 09 29 87 22 20 | 5b 66 69 6c 65 2d 61 74 |....)." |[file-at|
|00000a70| 74 72 20 66 69 6c 65 2d | 74 79 70 65 20 31 30 35 |tr file-|type 105|
|00000a80| 20 73 77 69 74 63 68 65 | 73 20 66 6f 72 6d 61 74 | switche|s format|
|00000a90| 20 22 25 36 64 20 22 20 | 31 30 20 31 31 35 20 22 | "%6d " |10 115 "|
|00000aa0| 25 34 64 20 22 20 37 20 | 31 30 32 34 20 38 20 22 |%4d " 7 |1024 8 "|
|00000ab0| 20 25 33 64 20 25 2d 38 | 64 20 25 2d 38 64 20 25 | %3d %-8|d %-8d %|
|00000ac0| 38 64 20 22 20 32 20 33 | 20 64 69 72 65 64 2d 6c |8d " 2 3| dired-l|
|00000ad0| 69 73 70 2d 66 6f 72 6d | 61 74 2d 74 69 6d 65 20 |isp-form|at-time |
|00000ae0| 22 20 22 20 66 69 6c 65 | 2d 6e 61 6d 65 20 22 20 |" " file|-name " |
|00000af0| 2d 3e 20 22 20 22 22 20 | 22 5c 6e 22 5d 20 31 30 |-> " "" |"\n"] 10|
|00000b00| 5d 20 64 69 72 65 64 2d | 6c 69 73 70 2d 74 69 6d |] dired-|lisp-tim|
|00000b10| 65 2d 69 6e 64 65 78 20 | 23 5b 28 73 77 69 74 63 |e-index |#[(switc|
|00000b20| 68 65 73 29 20 22 c0 09 | 3e ab 82 c2 87 c3 09 3e |hes) "..|>......>|
|00000b30| ab 82 c4 87 c5 87 22 20 | 5b 39 39 20 73 77 69 74 |......" |[99 swit|
|00000b40| 63 68 65 73 20 36 20 31 | 31 37 20 34 20 35 5d 20 |ches 6 1|17 4 5] |
|00000b50| 32 5d 20 64 69 72 65 64 | 2d 6c 69 73 70 2d 66 6f |2] dired|-lisp-fo|
|00000b60| 72 6d 61 74 2d 74 69 6d | 65 20 23 5b 28 66 69 6c |rmat-tim|e #[(fil|
|00000b70| 65 2d 61 74 74 72 20 73 | 77 69 74 63 68 65 73 29 |e-attr s|witches)|
|00000b80| 20 22 c0 c1 c2 8f 87 22 | 20 5b 65 72 72 6f 72 2d | "....."| [error-|
|00000b90| 64 61 74 61 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |data (by|te-code |
|00000ba0| 22 c0 c1 5c 6e 21 0b 38 | 21 89 1c c5 c6 4f 1e 07 |"..\n!.8|!....O..|
|00000bb0| 0c c6 c8 4f 1e 09 0c ca | cb 4f 89 1e 0c c0 20 ca |...O....|.O.... .|
|00000bc0| cb 4f 9a 1e 0d 0e 07 0e | 0d ab 84 0e 09 aa 82 0e |.O......|........|
|00000bd0| 0c 50 2d 87 22 20 5b 63 | 75 72 72 65 6e 74 2d 74 |.P-." [c|urrent-t|
|00000be0| 69 6d 65 2d 73 74 72 69 | 6e 67 20 64 69 72 65 64 |ime-stri|ng dired|
|00000bf0| 2d 6c 69 73 70 2d 74 69 | 6d 65 2d 69 6e 64 65 78 |-lisp-ti|me-index|
|00000c00| 20 73 77 69 74 63 68 65 | 73 20 66 69 6c 65 2d 61 | switche|s file-a|
|00000c10| 74 74 72 20 74 69 6d 65 | 20 34 20 31 31 20 64 61 |ttr time| 4 11 da|
|00000c20| 74 65 20 31 36 20 63 6c | 6f 63 6b 20 31 39 20 32 |te 16 cl|ock 19 2|
|00000c30| 34 20 79 65 61 72 20 73 | 61 6d 65 2d 79 65 61 72 |4 year s|ame-year|
|00000c40| 5d 20 35 29 20 28 28 65 | 72 72 6f 72 20 22 4a 61 |] 5) ((e|rror "Ja|
|00000c50| 6e 20 30 30 20 30 30 3a | 30 30 22 29 29 5d 20 33 |n 00 00:|00"))] 3|
|00000c60| 5d 20 70 72 6f 76 69 64 | 65 20 64 69 72 65 64 2d |] provid|e dired-|
|00000c70| 6c 69 73 70 5d 20 32 29 | 0a |lisp] 2)|. |
+--------+-------------------------+-------------------------+--------+--------+